﻿Namespace BLL

    Public Class Veiculo

        Private _carro As String

        Private _modelo As String

        Private _fabricante As String

        Private _ano As Integer

        Private _cor As String

        Private _valorDiaAluguel As Double

        Private _possuiAlarme As Boolean

        Private _possuiTrava As Boolean

        Private _possuiArCondicionado As Boolean

        Private _possuiQuatroPortas As Boolean

        Public Sub New()
        End Sub

        Public Property carro As String
            Get
                Return Me._carro
            End Get
            Set(ByVal value As String)
                Me._carro = value
            End Set
        End Property

        Public Property modelo As String
            Get
                Return Me._modelo
            End Get
            Set(ByVal value As String)
                Me._modelo = value
            End Set
        End Property

        Public Property fabricante As String
            Get
                Return Me._fabricante
            End Get
            Set(ByVal value As String)
                Me._fabricante = value
            End Set
        End Property

        Public Property ano As Integer
            Get
                Return Me._ano
            End Get
            Set(ByVal value As Integer)
                Me._ano = value
            End Set
        End Property

        Public Property cor As String
            Get
                Return Me._cor
            End Get
            Set(ByVal value As String)
                Me._cor = value
            End Set
        End Property

        Public Property valorDiaAluguel As Double
            Get
                Return Me._valorDiaAluguel
            End Get
            Set(ByVal value As Double)
                Me._valorDiaAluguel = value
            End Set
        End Property

        Public Property possuiAlarme As Boolean
            Get
                Return Me._possuiAlarme
            End Get
            Set(ByVal value As Boolean)
                Me._possuiAlarme = value
            End Set
        End Property

        Public Property possuiTrava As Boolean
            Get
                Return Me._possuiTrava
            End Get
            Set(ByVal value As Boolean)
                Me._possuiTrava = value
            End Set
        End Property

        Public Property possuiArCondicionado As Boolean
            Get
                Return Me._possuiArCondicionado
            End Get
            Set(ByVal value As Boolean)
                Me._possuiArCondicionado = value
            End Set
        End Property

        Public Property possuiQuatroPortas As Boolean
            Get
                Return Me._possuiQuatroPortas
            End Get
            Set(ByVal value As Boolean)
                Me._possuiQuatroPortas = value
            End Set
        End Property



    End Class

End Namespace